entry
    sys::Stdin
    . { read-lines }
    . { debounce 2000 }
    . { concat-map &(line) => { sys::println { "GOT ?" line } } }
    . { crash-on-error }
    . { forever };


